# Usage: knight.tcl

if {![info exists eWorkDir]} {set eWorkDir [file dirname [info script]]}

package require DPeye

create {
	outputFile knight.ps 
	images {
		knight {knight16.bmp {trace 1 1} {} 1}
	}
	locationTypes {
		ShapePoints {number 1}
	}
	locations {
		dots {image {knight lime} ShapePoints x Blue}
	}
	shapes {
		horse {dots {line {
		}}}
		contour {dots {line {
			92 89 83 75 66 61 52 46 49 54 64 74 67 55
			48 45 42 38 36 37 41 39 34 26 19 17 10  7
			 3  4  1  2  5  8  9 11 13 18 21 24 27 28
			22 15 12 14 16 20    23 25 31 32 30 29 33
			35 40 43 44 47 51 71 77 76 72 70 60 53 50
			65 82 86 95 94 85 81 57 56 63 59 58 69 79
			88 91 87 80 73 62 68 78 84 90 93
		}}}
	}
	borders {
		knight {shape contour Yellow Border {Black 10}}
	}
	$MapDrawingScale .3
	frame none
}